-- @Author              : GGELUA
-- @Last Modified by    : baidwwy
-- @Date                : 2023-09-27 18:27:45
-- @Last Modified time  : 2023-09-27 19:03:22

local 内充系统 = 多开数据[多开数据.当前].__UI界面.窗口层:创建我的窗口("内充系统",0,0,700,360)
local 当前 =  多开数据.当前
local insert = table.insert
local format = string.format
local 基类 = require("界面/控件层/基类/物品基类")
local 内充物品 = class("内充系统", 基类)
local SDL = require 'SDL'
local GUI控件 = require('GUI.控件')
local function 时间转换(时间)
	return  os.date("%m", 时间).."月"..os.date("%d", 时间).."日 "
end
local function 数额尾数转换(数值)
    数值 = tonumber(数值)
    if 数值 < 10000 then
        return 数值
    elseif 数值 >= 10000 and 数值 < 100000000 then
        return string.format("%s%s",math.floor(数值/10000),"万")
    elseif 数值 >= 100000000 and 数值 < 1000000000000  then
        return string.format("%s%s",math.floor(数值/100000000),"亿")
    elseif  数值 >= 1000000000000 and 数值 < 10000000000000000  then
        return string.format("%s%s",math.floor(数值/1000000000000),"兆")
    elseif  数值 >= 10000000000000000  then
        return string.format("%s%s",math.floor(数值/10000000000000000),"京")
    end
end
local 发送内容={
    长安城={1001,377,49},                    --长安城"),
    建邺城={1501,92,96},                   --建邺城"),
    傲来国={1092,73,53},                      --傲来国"),
    长寿村={1070,91,151},                            --长寿村"),
    西梁女国={1040,108,98},                            --西梁女国"),
    宝象国={1226,117,48},                            --宝象国"),
    朱紫国={1208,128,36},                            --朱紫国"),
    ----------------------------------
    钱庄老板={1524,36,23},                                -- 钱庄老板"),
    钟馗={1122,57,63},   	                            -- 钟馗"),
    袁天罡={1001,358,35},   	                            -- 袁天罡"),
    冯铁匠={1025,27,23},   	                            -- 冯铁匠"),
    商会总管={1001,323,264},   	                            -- 商会总管"),
    杜少海={1001,399,206},   	                            -- 杜少海"),
    镖局={1024,31,24},   	                            -- 镖局"),
    帮派总管={1001,380,14},   	                            -- 帮派总管"),
    土地公公={1226,117,15},   	                            -- 土地公公"),
    闯关使者={1001,130,90},   	                            -- 闯关使者"),
    仙缘洞天={1216,90,80},   	                            -- 仙缘洞天"),
    月宫吴刚={1114,12,60},   	                            -- 月宫吴刚"),
    镇塔之神={1090,30,27},   	                            -- 镇塔之神"),
    慧觉和尚={1070,130,144},   	                            -- 慧觉和尚"),
    疥癞和尚={1002,30,79},   	                            -- 疥癞和尚"),
    吴举人={1026,26,26},  	                            -- 吴举人"),
    --------------------------------------
    东海湾={1506,76,94},                                -- 东海湾"),
    江南野外={1193,72,69},                                -- 江南野外"),
    大唐国境={1110,141,166},                                -- 大唐国境"),
    大唐境外={1173,345,72},                                -- 大唐境外"),
    墨家村={1218,45,12},                                -- 墨家村"),
    长寿郊外={1091,77,98},                                -- 长寿郊外"),
    碗子山={1228,59,19},                                -- 碗子山"),
    小雷音寺={1204,20,44},                                -- 小雷音寺"),
    观星台={1223,56,32},                                -- 观星台"),
    仙缘洞天={1216,85,75},                                -- 仙缘洞天"),
    柳林坡={1233,50,50},                                -- 柳林坡"),
    北俱芦洲={1174,50,50},                                -- 北俱芦洲"),
    丝绸之路={1235,50,50},                                -- 丝绸之路"),
    比丘国={1232,50,50},                                -- 比丘国"),
    须弥东界={1242,50,50},                                -- 须弥东界"),
    海底5层={1532,33,27},                                -- 海底5层"),
    地狱4层={1130,50,50},                                -- 地狱4层"),
    龙窟7层={1183,81,42},                                -- 龙窟2层"),
    凤巢7层={1192,107,61},                                -- 凤巢2层层"),
    女娲神迹={1201,50,50},                                -- 女娲神迹"),
    -- --------------------------------------
    方寸山={1135,72,63},                              -- 方寸山"),
    盘丝洞={1513,174,31},                               -- 盘丝洞"),
    天宫={1111,175,122},                                 -- 天宫"),
    天机城={1250,63,92},                               -- 天机城"),
    女儿村={1142,37,37},                            -- 女儿村"),
    阴曹地府={1122,101,102},                               -- 阴曹地府"),
    普陀山= {1140,20,18},                              -- 普陀山"),
    女魃墓={1249,51,44},                              -- 女魃墓"),
    神木林= {1138,46,121},                              -- 神木林"),
    无底洞={1139,61,125},                                 -- 无底洞"),
    凌波城={1150,33,67},                            -- 凌波城"),
    花果山={1251,38,76},                               -- 花果山"),
    化生寺={1002,7,88},                           -- 化生寺"),
    魔王寨={1512,76,29},                              -- 魔王寨"),
    五庄观={1146,26,55},                                -- 五庄观"),
    大唐官府={1198,131,82},                           -- 大唐官府"),
    狮驼岭={1131,109,77},                                 -- 狮驼岭"),
    龙宫={1116,71,77},                           -- 龙宫"),
    -- ------------------------------
    蓬莱仙岛={1207,50,50},                                     --蓬莱仙岛"),
    凌云渡={1920,50,50},                                     --凌云渡"),
    解阳山={1042,50,50},                                     --解阳山"),
    麒麟山={1210,50,50},                                     --麒麟山"),
    子母河底={1041,50,50},                                     --子母河底"),
    太岁府={1211,50,50},                                     --太岁府"),
    月宫={1114,50,50}                                     --月宫"),
}
local 累充奖励 = {"5元","2000元","3000元","5000元","13000元"}
local 兑换类型 = {"点卡兑换仙玉","点卡兑换银子","仙玉兑换储备","累充积分兑换点卡","累充积分兑换仙玉","仙玉兑换抽奖","点卡兑换抽奖"}
local 子系统 = {}
function 内充系统:初始化()
    __置窗口坐标(self)
    local nsf = require('SDL.图像')(700,360)
    if nsf:渲染开始() then
        __res:取图像(__res:取地址('shape/ui/xz/',0x00000012)):显示(0,0)
        nsf:渲染结束()
    end
    self:置精灵(nsf:到精灵())
end

function 内充系统:打开(data)
    self:置可见(true)
    self.数据 = data
    self:重置显示("首充奖励系统")
    self.首充奖励:置选中(true)
end

function 内充系统:刷新(data)
    self.数据 = data
end

function 内充系统:重置显示(str)
    for i,v in ipairs(子系统) do
        if v ~= str then
            内充系统[v]:置可见(false)
        else
            内充系统[v]:置可见(true)
        end
    end
end

local 首充奖励系统 = 内充系统:创建控件('首充奖励系统',0,0,700, 360)
function 首充奖励系统:重置()
    内充系统:重置显示("首充奖励系统")
    内充系统.奖励网格:置可见(true)
    local nsf = require('SDL.图像')(700,360)
    if nsf:渲染开始() then
        __res:取图像(__res:取地址('shape/ui/xz/',0xAAB00011)):显示(0,0)
        __res:取图像(__res:取地址('shape/ui/xz/',0xF0000012)):拉伸(420,175):显示(210,37)
        字体16:取图像('首'):显示(230,222)
        字体16:取图像('充'):显示(230,247)
        字体16:取图像('奖'):显示(230,272)
        字体16:取图像('励'):显示(230,297)
        local yy = 22
        if 内充系统.数据.首充数据.点卡 and 内充系统.数据.首充数据.点卡 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取点卡：%s',数额尾数转换(内充系统.数据.首充数据.点卡))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.首充数据.仙玉 and 内充系统.数据.首充数据.仙玉 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取仙玉：%s',数额尾数转换(内充系统.数据.首充数据.仙玉))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.首充数据.银子 and 内充系统.数据.首充数据.银子 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取银子：%s',数额尾数转换(内充系统.数据.首充数据.银子))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.首充数据.储备 and 内充系统.数据.首充数据.储备 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取储备：%s',数额尾数转换(内充系统.数据.首充数据.储备))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.首充数据.召唤兽 and 内充系统.数据.首充数据.召唤兽~="不给" then
            yy = 52
            字体16:取图像(format('领取：%s:%s一只',内充系统.数据.首充数据.类型,内充系统.数据.首充数据.召唤兽)):置颜色(__取颜色('红色')):显示(395,yy)
        end
        内充系统.奖励网格:置物品(内充系统.数据.首充数据.物品)
        nsf:渲染结束()
    end
    内充系统.图像 = nsf:到精灵()
end

local 累充好礼系统 = 内充系统:创建控件('累充好礼系统',0,0,700, 360)
insert(子系统,"累充好礼系统")
function 累充好礼系统:重置(i)
    内充系统:重置显示("累充好礼系统")
    内充系统.奖励网格:置可见(true)
    local nsf = require('SDL.图像')(700,360)
    if nsf:渲染开始() then
        __res:取图像(__res:取地址('shape/ui/xz/',0xAAB00011)):显示(0,0)
        __res:取图像(__res:取地址('shape/ui/xz/',0xF0000012)):拉伸(420,175):显示(210,37)
        字体16:取图像('累'):显示(230,222)
        字体16:取图像('充'):显示(230,247)
        字体16:取图像('奖'):显示(230,272)
        字体16:取图像('励'):显示(230,297)
        字体14:取图像('当前累计金额：'):显示(205,42)
        字体16:取图像(内充系统.数据.累计充值):显示(300, 42)
        累充好礼系统[累充奖励[1]]:置选中(true)
        内充系统.奖励网格:置物品(内充系统.数据.累充数据[1].物品)
        local yy = 120
        if 内充系统.数据.累充数据[i].货币类型 and 内充系统.数据.累充数据[i].货币数量 > 0 then
            yy = yy + 25
            字体16:取图像(format('领取%s：%s',内充系统.数据.累充数据[i].货币类型,数额尾数转换(内充系统.数据.累充数据[i].货币数量))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.累充数据[i].召唤兽 and 内充系统.数据.累充数据[i].召唤兽~="不给" then
            yy = yy + 25
            字体16:取图像(format('领取：%s:%s一只',内充系统.数据.累充数据[i].召唤兽类型,内充系统.数据.累充数据[i].召唤兽)):置颜色(__取颜色('红色')):显示(225,yy)
        end
        nsf:渲染结束()
    end
    内充系统.图像 = nsf:到精灵()
end

local xx = 0
local yy = 0
local xxx = 0
for n=1,#累充奖励 do
    xx = xx + 1
    local 名称 = 累充奖励[n]
    local 名称1 = 累充奖励[n].."赞助"
    for i, v in ipairs {
        {name = 累充奖励[n], x = 100 + xx * 130 ,y = 70 + yy * 30 , tcp = __res:getPNGCC(1,449,28,174,35,true):置拉伸(120,25), tcp1 = __res:getPNGCC(1,964,459,173,35,true):置拉伸(120,25)  , font = 名称1},
    } do
        local 临时函数 = 累充好礼系统:创建我的单选按钮(v.tcp,v.tcp1,v.name,v.x,v.y,v.font)
        function 临时函数:左键弹起(x, y)
            累充好礼系统:重置(n)
        end
    end
    if xx >= 3 then
        xx = 0
        xxx = xxx + 1
        yy = xxx
    end
end

local 领取累充 = 累充好礼系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(90,25),"领取累充",515,305,"领取奖励")
function 领取累充:左键弹起(消息,x,y)
    发送数据(当前 or self and self.当前, 36, { 领取 = "领取累充", 文本 = 内充系统.数据.累充数据[累充好礼系统.领取进度].文本, 编号 = 内充系统.数据.累充数据[累充好礼系统.领取进度].编号})
end

local 月卡奖励系统 = 内充系统:创建控件('月卡奖励系统',0,0,700, 360)
insert(子系统,"月卡奖励系统")
function 月卡奖励系统:重置()
    内充系统:重置显示("月卡奖励系统")
    内充系统.奖励网格:置可见(true)
    local nsf = require('SDL.图像')(700,360)
    if nsf:渲染开始() then
        __res:取图像(__res:取地址('shape/ui/xz/',0xAAB00011)):显示(0,0)
        __res:取图像(__res:取地址('shape/ui/xz/',0xF0000012)):拉伸(380,145):显示(225,60)
        if 内充系统.数据.月卡奖励数据 and 内充系统.数据.月卡奖励数据.月卡.开通 and os.time() - 内充系统.数据.月卡奖励数据.月卡.到期时间 <= 0 then
            字体16:取图像('生效中'):显示(285,42)
            字体16:取图像('每'):显示(230,222)
            字体16:取图像('日'):显示(230,247)
            字体16:取图像('奖'):显示(230,272)
            字体16:取图像('励'):显示(230,297)
        else
            字体16:取图像('未激活'):显示(285,42)
            字体16:取图像('每'):显示(230,222)
            字体16:取图像('日'):显示(230,247)
            字体16:取图像('奖'):显示(230,272)
            字体16:取图像('励'):显示(230,297)
        end
        if 内充系统.数据.月卡奖励数据 and 内充系统.数据.月卡奖励数据.月卡.到期时间 ~= 0 then
            字体14:取图像(时间转换(内充系统.数据.月卡奖励数据.月卡.到期时间)):显示(495, 42)
        end
        local yy = 42
        if 内充系统.数据.月卡奖励数据.点卡 and 内充系统.数据.月卡奖励数据.点卡 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取点卡：%s',数额尾数转换(内充系统.数据.月卡奖励数据.点卡))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.月卡奖励数据.仙玉 and 内充系统.数据.月卡奖励数据.仙玉 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取仙玉：%s',数额尾数转换(内充系统.数据.月卡奖励数据.仙玉))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.月卡奖励数据.银子 and 内充系统.数据.月卡奖励数据.银子 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取银子：%s',数额尾数转换(内充系统.数据.月卡奖励数据.银子))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.月卡奖励数据.储备 and 内充系统.数据.月卡奖励数据.储备 > 0 then
            yy = yy + 30
            字体16:取图像(format('领取储备：%s',数额尾数转换(内充系统.数据.月卡奖励数据.储备))):置颜色(__取颜色('红色')):显示(225,yy)
        end
        if 内充系统.数据.月卡奖励数据.召唤兽 and 内充系统.数据.月卡奖励数据.召唤兽~="不给" then
            yy = 72
            字体16:取图像(format('领取：%s:%s一只',内充系统.数据.月卡奖励数据.类型,内充系统.数据.月卡奖励数据.召唤兽)):置颜色(__取颜色('红色')):显示(395,yy)
        end
        nsf:渲染结束()
    end
    if 内充系统.数据.月卡奖励数据 then
        if 内充系统.数据.月卡奖励数据 and 内充系统.数据.月卡奖励数据.月卡.开通 and os.time() - 内充系统.数据.月卡奖励数据.月卡.到期时间 <= 0 then
            内充系统.奖励网格:置物品(内充系统.数据.月卡奖励数据.物品)
        else
            内充系统.奖励网格:置物品(内充系统.数据.月卡奖励数据.物品)
        end
    end
    内充系统.图像 = nsf:到精灵()
end


local 领取奖励 = 月卡奖励系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(90,25),"领取奖励",515,275,"领取奖励")

function 领取奖励:左键弹起(消息,x,y)
    if 内充系统.数据.月卡奖励数据 and 内充系统.数据.月卡奖励数据.月卡.开通 and os.time() - 内充系统.数据.月卡奖励数据.月卡.到期时间 <= 0 then
        发送数据(当前 or self and self.当前,45,{文本 = "领取奖励"})
    else
       多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y当前并未激活月卡，请先激活月卡再来领取奖励")
    end
end

local 购买月卡 = 月卡奖励系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(90,25),"购买月卡",515,305,"购买月卡")

function 购买月卡:左键弹起(消息,x,y)
    多开数据[当前].__UI弹出.提示弹出:打开("你确定要购买月卡么,月卡未到期会自动延续时间?", 45,{文本 = "购买月卡"})
end


local 货币互换系统 = 内充系统:创建控件('货币互换系统', 0, 0, 700, 360)
insert(子系统,"货币互换系统")
function 货币互换系统:重置()
    内充系统:重置显示("货币互换系统")
    内充系统.奖励网格:置可见(false)
    local nsf = require('SDL.图像')(700, 360)
    if nsf:渲染开始() then
        local lssj =  __res:取图像(__res:取地址('shape/ui/xz/',0xF0000011)):拉伸(130,24)
        __res:取图像(__res:取地址('shape/ui/xz/', 0xAAB00011)):显示(0, 0)
        __res:取图像(__res:取地址('shape/ui/xz/',0xF0000012)):显示(200,37)
        字体14:取图像("输入框中需填入扣除数额,填入的数额必须达到最低兑换限额"):置颜色(__取颜色("红色")):显示(210,30+280)
        for i=1,#内充系统.数据.兑换数据 do
            local str = 内充系统.数据.兑换数据[i].需求.."换"..内充系统.数据.兑换数据[i].给予.."  比例:1/"..内充系统.数据.兑换数据[i].比例
            字体16:取图像(str):置颜色(__取颜色("黑色")):显示(210,31+i*35) 
            lssj:显示(430, 30 + i*35)            
        end
        nsf:渲染结束()
    end
    内充系统.图像 = nsf:到精灵()

end

for i = 1, #兑换类型 do
    local 匿名函数 = 货币互换系统:创建输入(兑换类型[i], 440, 33 + i * 35, 100, 18)
    function 匿名函数:初始化()
        self:取光标精灵()
        self:置颜色(255, 255, 255, 255)
    end
end
for i,v in ipairs(兑换类型) do
    local 临时函数 = 货币互换系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(55,25),兑换类型[i].."按钮",580,32+i*35,"兑换")
    function 临时函数:左键弹起(x, y)
        if 货币互换系统[兑换类型[i]]:取文本()=="" or tonumber(货币互换系统[兑换类型[i]]:取文本()) == nil then
            多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y请输入正确的兑换数额")
        elseif tonumber(货币互换系统[兑换类型[i]]:取文本()) < 内充系统.数据.兑换数据[i].最低 then
            多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#R最少兑换"..内充系统.数据.兑换数据[i].最低.."的"..内充系统.数据.兑换数据[i].需求)
        else
            发送数据(当前,45,{文本="兑换货币",编号=i,数额=tonumber(货币互换系统[兑换类型[i]]:取文本())})
        end
    end
end

local 友情赞助系统 = 内充系统:创建控件('友情赞助系统',0,0,700, 360)
insert(子系统,"友情赞助系统")
function 友情赞助系统:重置()
    内充系统:重置显示("友情赞助系统")
    内充系统.奖励网格:置可见(false)
    local nsf = require('SDL.图像')(700,360)
    if nsf:渲染开始() then
        __res:取图像(__res:取地址('shape/ui/xz/',0x00000012)):显示(0,0)
        字体16:置颜色(__取颜色("红色"))
        字体16:取图像(内充系统.数据.点卡 or 0):显示(277,277) 
        字体16:取图像(内充系统.数据.仙玉 or 0):显示(435,277) 
        nsf:渲染结束()
    end
    内充系统.图像 = nsf:到精灵()
end

local CDK输入 = 友情赞助系统:创建输入("CDK输入",280,311,240,18)
function CDK输入:初始化()
    self:取光标精灵()
    self:置颜色(255,255,255,255)
end

local 数量输入 = 友情赞助系统:创建输入("数量输入",322,47,70,18)
function 数量输入:初始化()
    self:取光标精灵()
    self:置颜色(255,255,255,255)

end

local 前往赞助 = 友情赞助系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(100,25),"前往赞助",525,275,"前往赞助")

function 前往赞助:左键弹起(消息,x,y)
    SDL.OpenURL(内充系统.数据.充值相关.网站)
end

local CDK兑换 = 友情赞助系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(55,25),"CDK兑换",580,308,"兑换")

function CDK兑换:左键弹起(消息,x,y)
    if 友情赞助系统.CDK输入:取文本() == "" then
       多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y/请输入正确的卡号")
        友情赞助系统.CDK输入:清空()
        return
    end
    发送数据(当前 or self and self.当前,16,{卡号=友情赞助系统.CDK输入:取文本()})
    友情赞助系统.CDK输入:清空()
    内充系统:置可见(false)
end

local 粘贴 = 友情赞助系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(55,25),"粘贴",520,308,"粘贴")
function 粘贴:左键弹起(消息,x,y)
    if SDL.HasClipboardText() then
        CDK输入:删除选中()
        CDK输入:插入文本(SDL.GetClipboardText())
    end
end

local 快捷传送控件 = {}
local 快捷传送系统 = 内充系统:创建控件('快捷传送系统',0,0,700, 360)
insert(子系统,"快捷传送系统")
function 快捷传送系统:重置(str)
    内充系统:重置显示("快捷传送系统")
    local nsf = require('SDL.图像')(700,360)
    内充系统.奖励网格:置可见(false)
    if nsf:渲染开始() then 
        __res:取图像(__res:取地址('shape/ui/xz/',0xF0000012)):显示(200,37)
        nsf:渲染结束()
    end
    for i=1,#快捷传送控件 do
        if 快捷传送控件[i] == str then
            快捷传送系统[快捷传送控件[i]]:置可见(true)
        else
            快捷传送系统[快捷传送控件[i]]:置可见(false)
        end
    end
    内充系统.图像 = nsf:到精灵()
end

for i, v in ipairs {
    {name = '主城传送', x = 205 ,y = 40 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(100,35), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(100,35), font = '主城传送'},
    {name = '门派传送', x = 315 ,y = 40 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(100,35), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(100,35), font = '门派传送'},
    {name = 'NPC传送', x = 425,y = 40 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(100,35), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(100,35), font = 'NPC传送'},
    {name = '野外传送', x = 535 ,y = 40 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(100,35), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(100,35), font = '野外传送'},
    {name = '超级传送', x = 535 ,y = 300 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(100,35), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(100,35), font = '超级传送'},
} do
    local 临时函数 = 快捷传送系统:创建我的单选按钮(v.tcp,v.tcp2,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        if v.name == '门派传送' then
            快捷传送系统:重置('门派传送控件')
        elseif v.name == "NPC传送" then
            快捷传送系统:重置('NPC传送控件')
        elseif v.name == "野外传送" then
            快捷传送系统:重置('野外传送控件')
        elseif v.name == "主城传送" then
            快捷传送系统:重置("主城传送控件")
        elseif v.name == "超级传送" then
            多开数据[当前].__UI弹出.世界大地图:打开()
            内充系统.关闭:左键弹起()
        end
    end
end

local 主城传送控件 = 快捷传送系统:创建控件('主城传送控件',100,0,700, 360)
insert(快捷传送控件,'主城传送控件')
for i, v in ipairs {
    {name = "建邺城", x = 110 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '建邺城'},
    {name = "长安城", x = 220 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '长安城'},
    {name = "傲来国", x = 330 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '傲来国'},
    {name = "长寿村", x = 440 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '长寿村'},
    {name = "西梁女国", x = 110 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '西梁女国'},
    {name = "宝象国", x = 220 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '宝象国'},
    {name = "朱紫国", x = 330 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '朱紫国'},
} do
    local 临时函数 = 主城传送控件:创建我的按钮(v.tcp,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        发送数据(当前 or self and self.当前,48,发送内容[v.name])
    end
end

local 门派传送控件 = 快捷传送系统:创建控件('门派传送控件',100,0,700, 360)
insert(快捷传送控件,'门派传送控件')
for i, v in ipairs {
    {name = "方寸山", x = 110 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '方寸山'},
    {name = "盘丝洞", x = 220 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '盘丝洞'},
    {name = "天宫", x = 330 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '天宫'},
    {name = "女儿村", x = 440 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '女儿村'},
    {name = "阴曹地府", x = 110 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '阴曹地府'},
    {name = "普陀山", x = 220 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '普陀山'},
    {name = "神木林", x = 330 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '神木林'},
    {name = "无底洞", x = 440 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '无底洞'},
    {name = "凌波城", x = 110 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '凌波城'},
    {name = "化生寺", x = 220 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '化生寺'},
    {name = "魔王寨", x = 330 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '魔王寨'},
    {name = "五庄观", x = 440 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '五庄观'},
    {name = "大唐官府", x = 110 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '大唐官府'},
    {name = "狮驼岭", x = 220 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '狮驼岭'},
    {name = "龙宫", x = 330 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '龙宫'},
} do
    local 临时函数 = 门派传送控件:创建我的按钮(v.tcp,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        发送数据(当前 or self and self.当前,48,发送内容[v.name])
    end
end

local NPC传送控件 = 快捷传送系统:创建控件('NPC传送控件',100,0,700, 360)
insert(快捷传送控件,'NPC传送控件')
for i, v in ipairs {
    {name = "钱庄老板", x = 110 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '钱庄老板'},
    {name = "钟馗", x = 220 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '钟馗'},
    {name = "袁天罡", x = 330 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '袁天罡'},
    {name = "袁守诚", x = 440 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '冯铁匠'}, 
    {name = "商会总管", x = 110 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '商会总管'},
    {name = "杜少海", x = 220 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '杜少海'},
    {name = "镖局", x = 330 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '镖局'},
    {name = "帮派总管", x = 440 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '帮派总管'},
    {name = "土地公公", x = 110 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '土地公公'},
    {name = "闯关使者", x = 220 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '闯关使者'},
    {name = "仙缘洞天", x = 330 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '仙缘洞天'},
    {name = "月宫吴刚", x = 440 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '月宫吴刚'},
    {name = "镇塔之神", x = 110 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '镇塔之神'},
    {name = "慧觉和尚", x = 220 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '慧觉和尚'},
    {name = "疥癞和尚", x = 330 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '疥癞和尚'},
    {name = "吴举人", x = 440 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '吴举人'},
} do
    local 临时函数 = NPC传送控件:创建我的按钮(v.tcp,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        发送数据(当前 or self and self.当前,48,发送内容[v.name])
    end
end

local 野外传送控件 = 快捷传送系统:创建控件('野外传送控件',100,0,700, 360)
insert(快捷传送控件,'野外传送控件')
for i, v in ipairs {
    {name = "东海湾", x = 110 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '东海湾'},
    {name = "江南野外", x = 220 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '江南野外'},
    {name = "大唐国境", x = 330 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '大唐国境'},
    {name = "大唐境外", x = 440 ,y = 90 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '大唐境外'},
    {name = "长寿郊外", x = 110 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '长寿郊外'},
    {name = "碗子山", x = 220 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '碗子山'},
    {name = "月宫", x = 330 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '月宫'},

    {name = "太岁府", x = 440 ,y = 125 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '太岁府'},
    {name = "仙缘洞天", x = 110 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '仙缘洞天'},
    {name = "柳林坡", x = 220 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '柳林坡'},
    {name = "北俱芦洲", x = 330 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '北俱芦洲'},
    {name = "丝绸之路", x = 440 ,y = 160 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '丝绸之路'},
    {name = "比丘国", x = 110 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '比丘国'},
    {name = "须弥东界", x = 220 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '须弥东界'},
    {name = "海底5层", x = 330 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '海底5层'},
    {name = "地狱4层", x = 440 ,y = 195 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '地狱4层'},

    {name = "墨家村", x = 110 ,y = 230 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '墨家村'},
    {name = "龙窟7层", x = 220 ,y = 230 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '龙窟7层'},
    {name = "凤巢7层", x = 330 ,y = 230 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '凤巢7层'},
    {name = "女娲神迹", x = 440 ,y = 230 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '女娲神迹'},

    {name = "蓬莱仙岛", x = 110 ,y = 265 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '蓬莱仙岛'},
    {name = "凌云渡", x = 220 ,y = 265 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '凌云渡'},
    {name = "解阳山", x = 330 ,y = 265 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '解阳山'},
    {name = "麒麟山", x = 440 ,y = 265 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '麒麟山'},

    {name = "子母河底", x = 110 ,y = 299 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,25) , font = '子母河底'},

} do
    local 临时函数 = 野外传送控件:创建我的按钮(v.tcp,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        发送数据(当前 or self and self.当前,48,发送内容[v.name])
    end
end

local 关闭 = 内充系统:创建我的按钮(__res:取图像(__res:取地址('shape/ui/xz/',0x00000013)),"关闭",638,0)
function 关闭:左键弹起(x,y,msg)
    内充系统:置可见(false)
end

local 奖励网格 = 内充系统:创建网格("奖励网格",20+236,75+148,350,120)

function 奖励网格:初始化()
    self:创建格子(55,55,0,-5,2,7,nil,12)
end

function 奖励网格:左键弹起(x, y, a, b, msg)
    if 内充系统.奖励选中 ~= 0 and self.子控件[内充系统.奖励选中]  then
        self.子控件[内充系统.奖励选中]._spr.确定 = nil
    end
    if self.子控件[a] and self.子控件[a]._spr and self.子控件[a]._spr.物品 then
        local w,h = self.子控件[a]:取宽高()
        内充系统.奖励选中 = a
        self.子控件[a]._spr:详情打开(170,86,w,h,"选择",a)
    end
end


function 奖励网格:置物品(数据)
    for i = 1,#self.子控件 do
        local lssj = __商店格子.创建(当前)
        lssj:置物品(数据[i],"奖励格",true)
        self.子控件[i]:置精灵(lssj)
    end
end

for i, v in ipairs {
    {name = '首充奖励', x = 50 ,y = 30 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '首充奖励'},
    {name = '累充好礼', x = 50 ,y = 75 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '累充好礼'},
    {name = '每日活动', x = 50 ,y = 120 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '每日活动'},
    {name = '月卡奖励', x = 50 ,y = 165 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '月卡奖励'},
    {name = '货币互换', x = 50 ,y = 210 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '货币互换'},
    {name = '卡号充值', x = 50 ,y = 255 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '卡号充值'},
    {name = '快捷传送', x = 50 ,y = 300 , tcp = __res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40), tcp2 = __res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40), font = '快捷传送'},
} do
    local 临时函数 = 内充系统:创建我的单选按钮(v.tcp,v.tcp2,v.name,v.x,v.y,v.font)
    function 临时函数:左键弹起(x, y)
        if v.name == '首充奖励' then
            内充系统.首充奖励系统:重置()
        elseif v.name == "累充好礼" then
            内充系统.累充好礼系统:重置(1)
        elseif v.name == "月卡奖励" then
            if 内充系统.数据.月卡奖励数据 == nil then
                发送数据(当前 or self and self.当前, 45,{文本 = "查看月卡"})
            else
                内充系统.月卡奖励系统:重置()
            end
        elseif v.name == "卡号充值" then
            内充系统.友情赞助系统:重置()
        elseif v.name == "快捷传送" then
            内充系统.快捷传送系统.主城传送:置选中(true)
            内充系统.快捷传送系统:重置("主城传送控件")
        elseif v.name == "货币互换" then
            if 内充系统.数据.兑换数据 == nil then
                发送数据(当前 or self and self.当前, 45,{文本 = "查看兑换"})
            else
                内充系统.货币互换系统:重置()
            end
        end
    end
end

































































-- local 战令系统 = 内充系统:创建我的单选按钮(__res:getPNGCC(1,401,65,175,43,true):置拉伸(140,40),__res:getPNGCC(1,963,495,175,43,true):置拉伸(140,40),"战令系统",50,190,"战令系统")

-- function 战令系统:左键按下(消息,x,y)
--     内充系统.友情赞助:置选中(false)
--     内充系统.月卡奖励:置选中(false)
--     内充系统.累充好礼:置选中(false)
--     内充系统.战令系统:置选中(true)
--     内充系统.战令奖励系统:重置()
--     内充系统.类型 = 4
--     战令奖励系统.奖励领取选中 = nil
-- end

-- local 战令奖励系统 = 内充系统:创建控件('战令奖励系统',0,0,700, 360)

-- function 战令奖励系统:重置()
--     内充系统.友情赞助系统:置可见(false)
--     内充系统.月卡奖励系统:置可见(false)
--     内充系统.累充好礼系统:置可见(false)
--     内充系统.战令奖励系统:置可见(true)
--     内充系统.奖励网格:置可见(false)
--     local nsf = require('SDL.图像')(640,340)
--     if nsf:渲染开始() then
--         __res:取图像(__res:取地址('shape/ui/xz/',0xAAB00011)):显示(0,0)
--         取白色背景(0, 0, 443, 308,true):显示(197,31)
--         local 战令显示 = "暂未激活战令"
--         if 内充系统.数据.战令数据.高级战令激活 then
--             战令显示 = "高级战令"
--         elseif not 内充系统.数据.战令数据.高级战令激活 and 内充系统.数据.战令数据.低级战令激活 then
--             战令显示 = "低级战令"
--         end
--         字体14:置颜色(__取颜色("白色"))
--         字体14:取图像('当前已激活：'):显示(205,42)
--         字体14:置颜色(__取颜色("红色"))
--         字体14:取图像(战令显示):显示(290,42)
--         字体16:置颜色(__取颜色("白色"))
--         字体16:取图像("活跃度"):显示(210,100)
--         字体16:取图像("低级战令"):显示(310,100)
--         字体16:取图像("高级战令"):显示(410,100)
--         字体16:置颜色(__取颜色("红色"))
--         字体16:取图像("温馨提示："):显示(410,42)
--         字体14:取图像("低级战令激活需要消耗500W银子"):显示(410,62)
--         字体14:取图像("高级战令商城购买，并附赠低级战令"):显示(410,82)
--         nsf:渲染结束()
--     end

--     内充系统.图像 = nsf:到精灵()
--     self.战令显示列表:重置()

-- end

-- local 战令显示列表 = 战令奖励系统:创建列表("战令显示列表",200,120,305,215)
-- do
--     function 战令显示列表:初始化()
--         self.行高度 = 0
--         self.行间距 = 0
--         战令奖励系统.奖励领取选中 = nil
--     end
-- end

-- function 战令显示列表:重置()
--     for n=1,#活跃度_lm do
--         local nsf = require('SDL.图像')(305,55)
--         if nsf:渲染开始() then
--             取蓝黑色背景(0, 0, 305, 55,true):显示(0,0)
--             字体16:取图像(活跃度[n]):显示(20, 19)
--             __res:取图像(__res:取地址('shape/ui/xz/',0x00000008)):显示(115,1)
--             __res:取图像(__res:取地址('shape/ui/xz/',0x00000008)):显示(215,1)
--             字体14:置颜色(__取颜色("黄色"))
--             if 内充系统.数据.低级战令[活跃度_lm[n]][1] and 内充系统.数据.低级战令[活跃度_lm[n]][1].名称 ~= nil and 内充系统.数据.低级战令[活跃度_lm[n]][1].名称 ~= "" then
--                 基类:取数据(内充系统.数据.低级战令[活跃度_lm[n]][1])
--                 __res:取图像(__res:取地址('shape/dj/',基类.物品.小模型资源)):显示(115,1)
--                 if 内充系统.数据.低级战令[活跃度_lm[n]][1].关键字 then
--                     字体14:取图像(内充系统.数据.低级战令[活跃度_lm[n]][1].关键字):显示(115,1)
--                 end
--             end
--             if 内充系统.数据.高级战令[活跃度_lm[n]][1] and 内充系统.数据.高级战令[活跃度_lm[n]][1].名称 ~= nil and 内充系统.数据.高级战令[活跃度_lm[n]][1].名称 ~= "" then
--                 基类:取数据(内充系统.数据.高级战令[活跃度_lm[n]][1])
--                 local ss = __res:取图像(__res:取地址('shape/dj/',基类.物品.小模型资源)):显示(215,1)
--                 if 内充系统.数据.高级战令[活跃度_lm[n]][1].关键字 then
--                     字体14:取图像(内充系统.数据.高级战令[活跃度_lm[n]][1].关键字):显示(215,1)
--                 end
--             end
--             nsf:渲染结束()
--         end
--         local r = self:添加()
--         r:置精灵(nsf:到精灵())
--         function 战令显示列表:左键弹起(x, y, n, item, msg)
--             战令奖励系统.奖励领取选中 = n
--         end
--     end

-- end

-- for i, v in ipairs {
--     {name = "领取礼包", x = 523 ,y = 295 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(98,35) , font = '领取礼包'},
--     {name = "激活低级战令", x = 205 ,y = 61 , tcp = __res:getPNGCC(1,449,28,174,35,true):拉伸(135,35) , font = '激活低级战令'},
-- } do
--     local 临时函数 = 战令奖励系统:创建我的按钮(v.tcp,v.name,v.x,v.y,v.font)
--     function 临时函数:左键弹起(x, y)
--         if v.name == "领取礼包" then
--             if not 战令奖励系统.奖励领取选中 then
--                多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y请先选择需要领取的礼包类型")
--                 return
--             else
--                 发送数据(当前 or self and self.当前,52.6,{领取进度 = 活跃度[战令奖励系统.奖励领取选中]})
--             end
--         elseif v.name == "激活低级战令" then
--             if 内充系统.数据 and 内充系统.数据.战令数据 then
--                 if not 内充系统.数据.战令数据.低级战令激活 then
--                     发送数据(当前 or self and self.当前,52.7)
--                 else
--                    多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y当前低级战令已处于激活状态")
--                     临时函数:我的按钮置文字(临时函数,__res:getPNGCC(1,449,28,174,35,true):拉伸(140,35),"已激活低级战令")
--                     临时函数:置禁止(true)
--                     return
--                 end
--             end
--         end
--     end
-- end


-- local 兑换输入 = 友情赞助系统:创建输入("兑换输入",477,47,70,18)
-- function 兑换输入:初始化()
--     self:取光标精灵()
--     self:置颜色(255,255,255,255)
-- end


-- local 仙玉兑换 = 友情赞助系统:创建我的按钮(__res:getPNGCC(1,449,28,174,35,true):置拉伸(100,25),"仙玉兑换",545,40,"仙玉兑换")

-- function 仙玉兑换:左键弹起(消息,x,y)
--     if tonumber(友情赞助系统.兑换输入:取文本()) == nil then
--         多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y/请输入正确的数值")
--         友情赞助系统.兑换输入:清空()
--         return
--     elseif tonumber(友情赞助系统.兑换输入:取文本()) < 内充系统.数据.兑换比例 then
--         多开数据[当前 or self and self.当前].__UI弹出.提示框:打开("#Y/兑换的数额太少了")
--         友情赞助系统.兑换输入:清空()
--         return
--     end
--     local 回调处理 = function (i,选项)
--         if 选项[i] == "兑换" then
--             发送数据(当前 or self and self.当前,47,{数额=tonumber(友情赞助系统.兑换输入:取文本())})
--         end
--         友情赞助系统.兑换输入:清空()
--         内充系统:置可见(false)
--     end
--     多开数据[当前].__UI界面.窗口层.对话栏:打开({模型="普陀_接引仙女",名称="梦幻精灵",对话="当前兑换比例为1:"..内充系统.数据.兑换比例.."你确定要兑换么？",选项={"兑换","我再考虑考虑"},回调处理=回调处理,选中名称=""})
-- end